home *** CD-ROM | disk | FTP | other *** search
- object FrmMailboxes: TFrmMailboxes
- Left = 377
- Top = 586
- Width = 182
- Height = 267
- BorderIcons = [biSystemMenu]
- BorderStyle = bsSizeToolWin
- Caption = 'Mailboxes'
- Color = clBtnFace
- DragKind = dkDock
- DragMode = dmAutomatic
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = True
- Scaled = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnHide = FormHide
- OnShow = FormShow
- PixelsPerInch = 120
- TextHeight = 16
- object PnlMain: TPanel
- Left = 0
- Top = 4
- Width = 174
- Height = 223
- Align = alClient
- BevelOuter = bvNone
- ParentColor = True
- TabOrder = 0
- object MailTree: TElTree
- Left = 0
- Top = 19
- Width = 174
- Height = 204
- Align = alClient
- AlwaysKeepSelection = False
- BackgroundType = bgtVertGradient
- BorderStyle = bsNone
- DragAllowed = True
- DragRectAcceptColor = 11395500
- DragRectDenyColor = 12040191
- DragTrgDrawMode = ColorRect
- FlatFocusedScrollbars = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -17
- Font.Name = 'Arial'
- Font.Style = []
- GradientStartColor = clWhite
- GradientEndColor = 16771306
- HeaderHeight = 0
- HeaderHotTrack = False
- HeaderSections.Data = {
- F4FFFFFF03000000641D740600000000FFFFFFFF00010101010063656E000000
- 000000001027000000000065C4879A0200000000000065720000000000000106
- 000000000000000000010000000000007263615C4643616C656E6461722E6466
- 6D0065729C1874069C18740630000000433A5C446174615C506F636F335F4261
- 7263615C4643616C656E6461722E6466900000000D0000004D61696C626F7820
- 4E616D650001000000000000000000000000641D740600000000FFFFFFFF0001
- 0101010063651E0000000A000000640000000000016574889A02010000000000
- 65720000000000000106000000000000000000010000000000007263615C4643
- 616C656E6461722E64666D0065729C1874069C18740630000000433A5C446174
- 615C506F636F335F42617263615C4643616C656E6461722E6466900000000200
- 0000540001000000000000000000000000641D740600000000FFFFFFFF000001
- 01010063651E00000000000000640000000000016534899A0202000000020065
- 720000000000000106000000000000000000010000000000007263615C464361
- 6C656E6461722E64666D0065729C1874069C18740630000000433A5C44617461
- 5C506F636F335F42617263615C4643616C656E6461722E646690000000020000
- 00550001000000000000000000000000}
- HeaderFlat = True
- HideHintOnTimer = True
- HideSelectColor = clGray
- HideSelectTextColor = clWhite
- HideSelection = True
- HorzScrollBarStyles.MinThumbSize = 16
- HorzScrollBarStyles.NoSunkenThumb = True
- HorzScrollBarStyles.ShowTrackHint = False
- HorzScrollBarStyles.Width = 17
- HorzScrollBarStyles.ButtonSize = 21
- Images = ImagesMailbox
- LineHeight = 21
- LinesColor = clBtnShadow
- LockHeaderHeight = True
- MultiSelect = False
- OwnerDrawByColumn = False
- ParentFont = False
- PopupMenu = Popup
- RightClickSelect = False
- ScrollTracking = True
- ShowColumns = True
- ShowLeafButton = False
- ShowRoot = True
- SortType = stCustom
- StoragePath = 'Tree'
- TabOrder = 0
- TabStop = True
- Tracking = False
- UnderlineTracked = False
- UseCustomScrollBars = False
- VerticalLines = True
- VertScrollBarStyles.Flat = False
- VertScrollBarStyles.MinThumbSize = 8
- VertScrollBarStyles.NoSunkenThumb = True
- VertScrollBarStyles.ShowTrackHint = True
- VertScrollBarStyles.ThumbSize = 18
- VertScrollBarStyles.Width = 17
- VertScrollBarStyles.ButtonSize = 21
- VertScrollBarStyles.DrawBars = False
- TextColor = clBtnText
- BkColor = clBtnFace
- OnItemExpand = MailTreeItemExpand
- OnItemCollapse = MailTreeItemCollapse
- OnShowLineHint = MailTreeShowLineHint
- OnItemPicDraw = MailTreeItemPicDraw
- OnItemSelectedChange = MailTreeItemSelectedChange
- OnDragDrop = TreeViewDragDrop
- OnDragOver = TreeViewDragOver
- OnMouseMove = MailTreeMouseMove
- OnMouseUp = MailTreeMouseUp
- OnDblClick = MailTreeDblClick
- OnKeyPress = MailTreeKeyPress
- OnKeyUp = MailTreeKeyUp
- OnContextPopup = MailTreeContextPopup
- end
- object PnlTop: TElPanel
- Left = 0
- Top = 0
- Width = 174
- Height = 19
- BackgroundType = bgtHorzGradient
- GradientEndColor = 16741719
- GradientStartColor = 16750722
- GradientSteps = 64
- Align = alTop
- BevelOuter = bvNone
- UseXPThemes = False
- TabOrder = 1
- DockOrientation = doNoOrient
- DesignSize = (
- 174
- 19)
- object DivLine: TShape
- Left = 0
- Top = 18
- Width = 174
- Height = 1
- Align = alBottom
- end
- object BtnClose: TElGraphicButton
- Left = 156
- Top = 2
- Width = 14
- Height = 14
- Cursor = crDefault
- MoneyFlat = True
- MoneyFlatInactiveColor = clGray
- MoneyFlatActiveColor = clBlack
- MoneyFlatDownColor = clRed
- Layout = blGlyphRight
- NumGlyphs = 1
- ShadowFollowsColor = False
- ShadowsUseCustom = True
- ShadowBtnHighlight = clYellow
- ShadowBtnShadow = clBlack
- ShadowBtnDkShadow = 33023
- LinkStyle = [fsUnderline]
- ThinFrame = True
- UseXPThemes = False
- Caption = 'X'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- OnClick = BtnCloseClick
- Anchors = [akTop, akRight]
- DockOrientation = doNoOrient
- end
- object BtnPop: TElPopupButton
- Left = -2
- Top = 1
- Width = 131
- Height = 16
- Cursor = crDefault
- DrawDefaultFrame = False
- PullDownMenu = Popup
- PopupPlace = ppRight
- AdjustSpaceForGlyph = False
- Flat = True
- LinkStyle = [fsUnderline]
- NumGlyphs = 1
- ShowFocus = False
- UseArrow = True
- ThinFrame = True
- Transparent = True
- ShowBorder = False
- UseXPThemes = False
- Caption = 'Mailb&oxes'
- TabStop = False
- TabOrder = 0
- Color = clBtnFace
- ParentColor = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- OnClick = BtnPopClick
- Anchors = [akLeft, akTop, akRight]
- DockOrientation = doNoOrient
- DoubleBuffered = False
- end
- end
- end
- object PnlShadow: TElPanel
- Left = 0
- Top = 0
- Width = 174
- Height = 4
- BackgroundType = bgtVertGradient
- GradientEndColor = clWindow
- GradientStartColor = clSilver
- Align = alTop
- BevelOuter = bvNone
- UseXPThemes = False
- TabOrder = 1
- Visible = False
- DockOrientation = doNoOrient
- end
- object ImagesMailbox: TImageList
- Left = 34
- Top = 149
- end
- object Popup: TPopupMenu
- OnPopup = PopupPopup
- Left = 32
- Top = 106
- object MenuCurrentTab: TMenuItem
- Caption = 'Open In Current Tab'
- OnClick = MenuCurrentTabClick
- end
- object MenuNewTab: TMenuItem
- Caption = 'Open In New Tab'
- OnClick = MenuNewTabClick
- end
- object N4: TMenuItem
- Caption = '-'
- end
- object NewMailbox1: TMenuItem
- Caption = 'New &Mailbox...'
- OnClick = BtnNewMailboxClick
- end
- object NewFolder1: TMenuItem
- Caption = 'New &Sub-mailbox...'
- OnClick = BtnNewFolderClick
- end
- object N5: TMenuItem
- Caption = '-'
- end
- object NewNewsgroup1: TMenuItem
- Caption = 'New Newsgroup...'
- end
- object NewNewsgroup2: TMenuItem
- Caption = 'New Newsgroup Server...'
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object MenuMarkRead: TMenuItem
- Caption = 'Mark All Read'
- OnClick = MenuMarkReadClick
- end
- object MenuMarkUnread: TMenuItem
- Caption = 'Mark All Unread'
- OnClick = MenuMarkReadClick
- end
- object N6: TMenuItem
- Caption = '-'
- end
- object Rename1: TMenuItem
- Caption = 'Re&name'
- ShortCut = 113
- OnClick = Rename1Click
- end
- object Delete1: TMenuItem
- Caption = '&Delete'
- OnClick = BtnDeleteClick
- end
- object N2: TMenuItem
- Caption = '-'
- end
- object EmptyTrash1: TMenuItem
- Caption = 'Empty &Trash'
- OnClick = EmptyTrash1Click
- end
- object EmptyFoundMailbox1: TMenuItem
- Caption = 'Empty Search Mailbox'
- OnClick = EmptyFoundMailbox1Click
- end
- object EmptyJunkMailbox1: TMenuItem
- Caption = 'Empty Junk Mailbox'
- OnClick = EmptyJunkMailbox1Click
- end
- object N3: TMenuItem
- Caption = '-'
- end
- object Columns1: TMenuItem
- Caption = 'Co&lumns'
- object MenuTotal: TMenuItem
- Caption = 'Show &Total Messages'
- OnClick = MenuTotalClick
- end
- object MenuUnread: TMenuItem
- Caption = 'Show &Unread Messages'
- OnClick = MenuUnreadClick
- end
- end
- object Refresh1: TMenuItem
- Caption = '&Refresh'
- Visible = False
- end
- object Properties1: TMenuItem
- Caption = '&Properties...'
- ShortCut = 32781
- OnClick = Properties1Click
- end
- end
- object ImagesFlags: TImageList
- Width = 10
- Left = 66
- Top = 98
- end
- object TimerDelay: TTimer
- Interval = 150
- OnTimer = TimerDelayTimer
- Left = 34
- Top = 44
- end
- object TimerExpand: TTimer
- Enabled = False
- Interval = 2000
- OnTimer = TimerExpandTimer
- Left = 72
- Top = 44
- end
- end
-